(parse_modifiers_uncached): Wheel events are clicks (bug#687).

diff --git a/src/keyboard.c b/src/keyboard.c
index 35257c6d999e77f43baafc80c6bf7d3603943461..127cae67ee003eead508340c7046fb5bb3b25c23 100644 (file)
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -6313,6 +6313,11 @@ parse_modifiers_uncached (symbol, modifier_end)
       && ('0' <= SREF (name, i + 6) && SREF (name, i + 6) <= '9'))
     modifiers |= click_modifier;
 
+  if (! (modifiers & (double_modifier | triple_modifier))
+      && i + 6 < SBYTES (name)
+      && strncmp (SDATA (name) + i, "wheel-", 6) == 0)
+    modifiers |= click_modifier;
+
   if (modifier_end)
     *modifier_end = i;